home *** CD-ROM | disk | FTP | other *** search
/ Language/OS - Multiplatform Resource Library / LANGUAGE OS.iso / et / et3_0-a1.lha / et3 / src / Point.C < prev    next >
C/C++ Source or Header  |  1992-04-27  |  3KB  |  145 lines
  1. #ifdef __GNUG__
  2. #pragma implementation
  3. #endif
  4.  
  5. #define FakeExternalDecl
  6. #include "Point.h"
  7.  
  8. #include "Class.h"
  9. #include "Math.h"
  10. #include "String.h"
  11.  
  12. /* In order to become independent from the order of global constructors
  13.    we fake C++ by using plain old C (which gets initialized by the loader)
  14. */
  15.  
  16. struct C_Point {
  17.     int x, y;
  18. };
  19.  
  20. C_Point gPoint_1 = { -1, -1 },
  21.     gPoint0,
  22.     gPoint1 = { 1, 1 },
  23.     gPoint2 = { 2, 2 },
  24.     gPoint3 = { 3, 3 },
  25.     gPoint4 = { 4, 4 },
  26.     gPoint5 = { 5, 5 },
  27.     gPoint6 = { 6, 6 },
  28.     gPoint7 = { 7, 7 },
  29.     gPoint8 = { 8, 8 },
  30.     gPoint10 = { 10, 10 },
  31.     gPoint16 = { 16, 16 },
  32.     gPoint32 = { 32, 32 },
  33.     gPoint64 = { 64, 64 };
  34.  
  35. SimpleMetaImpl(Point)
  36. {
  37.     len= len;
  38.     if (! isptr)
  39.     sprintf(buf, "%s", ((Point*) addr)->AsString());
  40. }
  41.  
  42. Point Min(Point p1, Point p2)
  43. {
  44.     return Point(Math::Min(p1.x, p2.x), Math::Min(p1.y, p2.y));
  45. }
  46.  
  47. Point Max(Point p1, Point p2)
  48. { 
  49.     return Point(Math::Max(p1.x, p2.x), Math::Max(p1.y, p2.y));
  50. }
  51.  
  52. Point Range (Point lb, Point ub, Point x)
  53. {
  54.     return Point(Math::Range(lb.x, ub.x, x.x), Math::Range(lb.y, ub.y, x.y));
  55. }
  56.  
  57. Point Point::Half() const
  58. {
  59.     return Point(x >> 1, y >> 1);
  60. }
  61.  
  62. Point Half (Point p)
  63. {
  64.     return Point(p.x/2, p.y/2);
  65. }
  66.  
  67. Point Abs(Point p)
  68. {
  69.     return Point(Math::Abs(p.x), Math::Abs(p.y));
  70. }
  71.  
  72. Point Sign(Point p)
  73. {
  74.     return Point(Math::Sign(p.x), Math::Sign(p.y));
  75. }
  76.  
  77. Point Scale(Point p, Point num, Point denom)
  78. {
  79.     Point r;
  80.     
  81.     if (denom.x)
  82.     r.x= (int)((float)(p.x*num.x) / (float)denom.x + 0.5);
  83.     if (denom.y)
  84.     r.y= (int)((float)(p.y*num.y) / (float)denom.y + 0.5);
  85.     
  86.     return r;
  87. }
  88.  
  89. Point Scale(Point p, float sx, float sy)
  90. {
  91.     return Point((float)((p.x*sx)+0.5), (float)((p.y*sy)+0.5));
  92. }
  93.  
  94. float Phi(Point p)
  95. {
  96.     return Math::Atan2(p.y, p.x);
  97. }
  98.  
  99. float Length(Point p)
  100. {
  101.     return (float) Math::Hypot(p.x, p.y);
  102. }
  103.  
  104. Point PolarToPoint(double ang, double fx, double fy)
  105. {
  106.     double si, co;
  107.     Math::Sincos(ang, &si, &co);
  108.     return Point((int)(fx*co+0.5), (int)(fy*si+0.5));
  109. }
  110.  
  111. Point polartopoint(double ang, double fx, double fy)
  112. {
  113.     double si, co;
  114.     Math::Sincos(ang, &si, &co);
  115.     return Point((int)(fx*co+0.5), (int)(fy*si+0.5));
  116. }
  117.  
  118. void Swap(Point &p1, Point &p2)
  119. {
  120.     Point tmp= p1;
  121.     p1= p2;
  122.     p2= tmp;
  123. } 
  124.   
  125. Point Flip(Point &p)
  126. {
  127.     return Point(p.y, p.x);
  128. } 
  129.   
  130. OStream& operator<< (OStream &s, Point p)
  131. {
  132.     return s << p.x SP << p.y SP;
  133. }
  134.  
  135. IStream& operator>> (IStream& s, Point& p)
  136. {
  137.     return s >> p.x >> p.y;
  138. }
  139.  
  140. char *Point::AsString() const
  141. {
  142.     return form("x: %d y: %d", x, y);
  143. }
  144.  
  145.